home *** CD-ROM | disk | FTP | other *** search
/ BBS Toolkit / BBS Toolkit.iso / doors_2 / tm240.zip / BBS.BAT next >
Encoding:
DOS Batch File  |  1990-06-20  |  1.2 KB  |  43 lines
  1. echo off
  2. cls
  3.  
  4. Rem Load and configure OPUSCOM1 and the Video Fossil for Binkley
  5. opuscom1
  6. ocom_cfg C S1=2048,2048
  7.  
  8.  
  9. rem change to my TAG directory and run TAG
  10. c:
  11. cd \tag
  12. tag
  13.  
  14. rem Now check for the returned Errorlevels from TAG.
  15. if errorlevel 151 goto chekloop
  16. if errorlevel 150 goto nmhevent
  17.  
  18. :chekloop
  19. rem Wait will countdown 15 seconds and exit with an errorlevel of 0.  Pressing
  20. rem escape will force WAIT to exit at an errorlevel of 1.  In this example,
  21. rem if the time limit expires,  the BBS.BAT file (This file) is run again. 
  22. rem if we press escape,  the errorlevel of 1 is picked up and sends us to the 
  23. rem end of this batch file and the DOS prompt.
  24.  
  25. wait 0:15
  26. if errorlevel 1 goto end
  27. bbs
  28.  
  29. :nmhevent
  30. rem This portion is called from within TAG if a user is on line at ZMH
  31. rem (Zone Mail Hour).  FidoNet rules state that all systems must be available
  32. rem for mail during the Zone Mail hour (or National Mail Hour).
  33. rem This means that no users should be allowed access to the system during
  34. rem that hour.
  35. rem we wait 2 minutes to allow the 1 minute event time to pass in TAG
  36.  
  37. wait 2:00
  38. bbs
  39.  
  40. :end
  41. vfos_del
  42. ocom_cfg r
  43.